type
 PtrUInt = LongWord;
 PtrInt = LongInt;
 
 PPtrUInt = ^PtrUInt;
 PPtrInt = ^PtrInt;
 
 SizeInt = longint;
 SizeUInt = longword;